Những câu hỏi liên quan
Nguyễn Phạm Như Trang
Xem chi tiết
Kiều Vũ Linh
18 tháng 12 2020 lúc 9:58

T = 100 nghìn thì không tính được số tiền phải trả ở cả 2 trường hợp đâu em!

Xem lại đề đi!

Bình luận (0)
phạm tường lam
Xem chi tiết
Phạm Ngọc chi
Xem chi tiết
LongNguyen
Xem chi tiết
Rhider
23 tháng 11 2021 lúc 10:25

program az;

uses Crt;

var n : real;

begin

clrscr;

Write('Nhap so tien thanh toan luc dau : '); readln(n);

If (n >= 100000) then n := (70*n)/100 else n := (90*n)/100;

Write('So tien can thanh toan la : ',n);

readln

end

Mình học từ hồi lớp 8 r

Bình luận (0)
LongNguyen
Xem chi tiết
Chanh Xanh
23 tháng 11 2021 lúc 9:54

uses crt;

var tien:real;

begin

clrscr;

repeat

write('Nhap so tien:'); readln(tien);

until tien>0;

if tien>=100000 then writeln(tien*70/100:4:2)

else writeln(tien*90/10:4:2);

readln;

end.

Bình luận (0)
Minh Tuệ Nguyễn
Xem chi tiết
Nguyên Bùi
8 tháng 9 2022 lúc 21:37

{ đơn giá: a, số lượng: b}

uses crt;

var a,b,s,thanhtoan:integer;

begin

write('nhap gia don hang:');

read(a);

write('nhap so luong hang:');

s:=0;

thanhtoan:=0;

s:=a*b;

if s>100 then thanhtoan:= s*(30/100)

   else thanhtoan:= s* (10/100);

write(' so tien can thanh toan la:',' ',thanhtoan);

readln;

end.

 

 

 

 

 

 

 

 

Bình luận (0)
Thái Thành
Xem chi tiết
Gia Minh
Xem chi tiết
Gia Minh
Xem chi tiết